home *** CD-ROM | disk | FTP | other *** search
/ Magnum One / Magnum One (Mid-American Digital) (Disc Manufacturing).iso / d12 / jazlib.arc / JZSCREEN.DMO < prev    next >
Encoding:
Text File  |  1988-12-18  |  706 b   |  37 lines
  1. #include <jaz.h>
  2. #include <jzscreen.h>
  3.  
  4. main(argc,argv)
  5. int argc;
  6. char **argv;
  7. {
  8.  
  9.   int w;
  10.   char wstr[256];
  11.   char wline[9];
  12.  
  13.   if (argc < 2) exit(0);    /* exit cuz no arguments */
  14.  
  15.   *argv++;            /* look past invoking pgm name */
  16.  
  17.   strncpy(wstr,*argv++,255);    /* get first argument into wstr */
  18.  
  19.   cls(LIGHTGRAY);
  20.  
  21.   while (*argv[0]) {        /* parse out the line */
  22.     strcat(wstr," ");
  23.     strcat(wstr,*argv++);
  24.   }
  25.  
  26.   jzgetpce(wstr,wline,',',1);   /* get first comma piece */
  27.  
  28.   w = 0;
  29.  
  30.   while (*wline) {
  31.     jzbigstr(wline,w * 8 + 1,CNTCOL(wline,10)*8+1,'░',RED);
  32.     jzbigstr(wline,w * 8,CNTCOL(wline,10)*8,'█',CYAN);
  33.     jzgetpce(wstr,wline,',',w + 2);
  34.     w ++;
  35.   }
  36. }
  37.